(cl:in-package comm-msg)
(cl:export '(STATE-VAL
          STATE
          LEFTSTATE-VAL
          LEFTSTATE
          RIGHTSTATE-VAL
          RIGHTSTATE
          LEFTANGLE-VAL
          LEFTANGLE
          RIGHTANGLE-VAL
          RIGHTANGLE
))